home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / SHNER16.ZIP / Remote.ini < prev    next >
INI File  |  1997-03-31  |  16KB  |  346 lines

  1. [Users]
  2. n0=7:dsa!*@dan9.mis.net
  3. n1=7:*!*shner15@*.mis.net
  4.  
  5. [Variables]
  6. n0=%ccn #teenchatz
  7. n1=%clist 0
  8. n2=%iropn ""
  9. n3=%clns 0
  10. n4=%nclns ""
  11. n5=%chaniop 0
  12. n6=%chanvo 0
  13. n7=%chanaway 0
  14. n8=%tvo 5
  15. n9=%permops 400
  16. n10=%perallops 44
  17. n11=%peroprem 4
  18. n12=%permnops 500
  19. n13=%perallnops 55
  20. n14=%permnoprem 5
  21. n15=%chitim 8
  22. n16=%ctcpchan off
  23. n17=%ctcppriv off
  24. n18=%repeatkick on
  25. n19=%textlength 300
  26. n20=%capchk ON
  27. n21=%repeat ON
  28. n22=%TShNeR15 1
  29. n23=%onick ShNeR15s
  30. n24=%signon 859802314
  31. n25=%shnerversion v12.0
  32. n26=%masscmd d
  33. n27=%cn 4
  34. n28=%pt 0
  35. n29=%splitserv channels2.undernet.org from Chicago.IL.US.Undernet.org
  36. n30=%nops Dragonf|r Kurt-
  37. n31=%atime 20:12:05
  38. n32=%flood.repeat.text.#teenchatzKurt Away! [ watching simpsons ] (Logging/Off) (Pager/On)
  39. n33=%flood.chan.#teenchatzKurt 1
  40. n34=%ops ChAnBOT CrAsH747 Dragonf|r ShNeRsCr
  41. n35=%shitlist Disabled
  42. n36=%flood.chan.#teenchatzCrAsH747 2
  43. n37=%flood.private.*!*@IP133.datachan.com 2
  44. n38=%flood.notice.*!*@dan9.mis.net 10
  45.  
  46. [Commands]
  47. n0=#floodultracommand disabled
  48. n1=1:*:halt
  49. n2=#floodultracommand end
  50. n3=#floodctcp disabled
  51. n4=!1:*:{
  52. n5=  if ((%ctcpchan == on) && ($chan != $null))  {
  53. n6=    if (($me isop $chan) && (%textlength != $null) && ($len($parms) > %textlength)) { mode $chan -o+b $nick $wildsite | kick $chan $nick Channel Long CTCP Flood! | .timer 1 45 mode $chan -b $wildsite | goto end }
  54. n7=    inc %flood.ctcp. [ $+ [ $chan [ $+  [ $nick ] ] ] ] 1
  55. n8=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  56. n9=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 4 {
  57. n10=      if $me isop $chan { mode $chan -o+b $nick $wildsite | kick $chan $nick Channel CTCP Flood! | .timer 1 45 mode $chan -b $wildsite }
  58. n11=      if (($me !isop $chan) && (%ctcppriv == off)) { echo 2 -a CTCP Channel Flood! ü $+ $nick $+ ü is being ignored. | if $parm1 == dcc .ignore -ntu90 $wildsite 2 | else .ignore -tu90 $wildsite }
  59. n12=      unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  60. n13=    }
  61. n14=    :end
  62. n15=  }
  63. n16=  if %ctcppriv == on {
  64. n17=    inc %flood.ctcp. [ $+ [ $wildsite ] ] 1
  65. n18=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $wildsite ] ]
  66. n19=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 4 { notice $nick CTCP Flood! You are being ignored. | unset %flood.ctcp. [ $+ [ $wildsite ] ] | if $parm1 == dcc .ignore -ntu90 $wildsite | else .ignore -tu90 $wildsite }
  67. n20=  }
  68. n21=}
  69. n22=#floodctcp end
  70. n23=1:*: { if $parm1 == version rctcp $nick VERSION [mIRC32 v4.72](Win95)]ShNeR15's [ShNeRsCrIpT v12.0] Rel(24) Available at: http://shnerscript.home.ml.org  .... WarScripts included! }
  71.  
  72. [Events]
  73. n0=#pager2 start
  74. n1=1:ON TEXT:!page*:#: {
  75. n2=  /set %pagenick $nick
  76. n3=  /splay pager.wav
  77. n4=  /notice $nick Paging $me, Plz Wait ....
  78. n5=  /describe $chan NOTICE: Paging $me for $nick $+ , Plz Wait!
  79. n6=  /echo 4 $active $me you are being Paged by %pagenick ... type /accept to Accept the Page or /deny to Deny the Page ...
  80. n7=  .timer97 999 40 /echo 4 $active $me you are being Paged by %pagenick ... type /accept to Accept the Page or /deny to Deny the Page ...
  81. n8=  .timer98 999 40 /splay pager.wav
  82. n9=  :azzzkfpage
  83. n10=}
  84. n11=#pager2 end
  85. n12=1:ON JOIN:#: {  
  86. n13=  inc %JO $+ $nick $+ $chan
  87. n14=  timer 1 10 unset %JO $+ $nick $+ $chan 
  88. n15=}
  89. n16=1:ON PART:#: {
  90. n17=  if ([ %JO [ $++ [ $nick [ $++ [ $chan ] ] ] ] ] == 1) {
  91. n18=    ban -u60 $chan $nick 3
  92. n19=    /describe $chan -=@=- $nick -=@=- ReVoLViNG DooR BaN : [1 MINUTE] | /kick $chan $nick ReVoLViNG DooR BaN : [1 MINUTE] | /notice $nick You have been BANNED for 1 Minute due to a ReVoLViNG DooR Join then Part in a period less than 10 Seconds...  You will be UNBANNED in 1 Minute!
  93. n20=    unset %JO $+ $nick $+ $chan 
  94. n21=  }
  95. n22=}
  96. n23=1:ON JOIN:%protect: {  
  97. n24=  if ($nick = $me) { who $chan | Echo 6 -a Updating Ial for -= $+ $chan $+ =- |  halt } 
  98. n25=  if ($isbot($nick) = true) { halt }
  99. n26=  if ($isme($nick) = true) { notice $nick Hey There Boss! , Welcome to $chan | halt }
  100. n27=  :clone | if (%clonecheck != ON) { goto end }
  101. n28=  %nx = 1 | %qc = $chr(32) | %nc = $ial($wildsite,0) | If (%nc = 0) { echo 4 -a Error Reading IAL on $site | halt }
  102. n29=  :up | if [ $ial($wildsite,%nx).nick ] ison $chan { %qc = %qc $ial($wildsite,%nx).nick , | inc %clns | inc %nx | goto up } 
  103. n30=  %qc = $remove(%qc,$chr(32))
  104. n31=  if ($dl($nick) < 100) { %c.max = %c.nor } | else { %c.max = %c.ops } 
  105. n32=  if (%Clns < %c.max) { goto end }
  106. n33=  if (%Clns = %c.max) { if (%c.max = 1 ) { halt } | notice $chan %qc  are %clns Connect(s) from $site and on $chan -=Max Connects: $+ %c.max $+ =- | goto other }
  107. n34=  if (%clns > %c.max)  {
  108. n35=    if ($me isop $chan) {
  109. n36=      if (%c.ban = on) { if ($isme($nick) = false) { ban -u30 $chan $nick 4 } }
  110. n37=      if (%c.rem = on) { 
  111. n38=        %num = 1 | :Kick | if (%num <= %Clns) { set %nick $gettok(%qc,%num,44) | if ($isme(%nick) = false)  { kick $chan %nick  -=Clone Number %num $+ =- out of %clns $+ , $a.kick(clone) Clones Removed by $dsc } | inc %num | goto Kick }
  112. n39=        goto end
  113. n40=      }
  114. n41=    } 
  115. n42=    else { notice $chan %qc are %clns Clones from $site and on $chan Get Them! | goto end }
  116. n43=  }
  117. n44=  :end | unset %nx %num %nick %qc %nc %clns  | halt
  118. n45=}  
  119. n46=#splitdetector
  120. n47=1:ON SNOTICE:*break*: { 
  121. n48=  echo 4 $active NOTICE: 2Server SPLIT detected -> $parm7 $parm8* 
  122. n49=  echo 4 $active NOTICE: 2Server SPLIT from hub -> $parm6
  123. n50=  if ( none isin %splitserv )  { set %splitserv $parm7 }
  124. n51=  else { set %splitserv %splitserv $parm7 }
  125. n52=  halt
  126. n53=}
  127. n54=1:ON SNOTICE:*junction*: {
  128. n55=  echo 4 $active NOTICE: 2Server MERGE -> $parm7
  129. n56=  echo 4 $active NOTICE: 2Server MERGE to hub -> $parm6
  130. n57=  set %splitserv $remove(%splitserv,$parm7)
  131. n58=  if  ( $len(%splitserv) < 3 ) { set %splitserv none }
  132. n59=  halt
  133. n60=}
  134. n61=1:ON SNOTICE:*:!
  135. n62=#splitdetector end
  136. n63=#floodultraevent disabled
  137. n64=1:on action:*:?:.close -m $nick | .ignore -inpt *!*@* | halt
  138. n65=1:on chat:*:.close -c $nick | .ignore -inpt *!*@* | halt
  139. n66=1:on ctcpreply:*:.ignore -inpt *!*@* | halt
  140. n67=1:on invite:#:.ignore -inpt *!*@* | halt
  141. n68=1:on nosound:.ignore -inpt *!*@* | halt
  142. n69=1:on notice:*:?:.ignore -inpt *!*@* | halt
  143. n70=1:on serv:*:.close -f $nick | .ignore -inpt *!*@* | halt
  144. n71=1:on snotice:*:.ignore -inpt *!*@* | halt
  145. n72=1:on text:*:?:.close -m $nick | .ignore -inpt *!*@* | halt
  146. n73=1:on wallops:*:.ignore -inpt *!*@* | halt
  147. n74=#floodultraevent end
  148. n75=!1:on invite:#:notice $nick You invited me to $chan $+ . All furthur invites will be ignored. | echo 2 -a You were invited by $nick to $chan $+ . | .ignore -iu45 $nick 2
  149. n76=#floodchan start
  150. n77=!1:on action:*:#:floodchan
  151. n78=!1:on notice:*:#:floodchan
  152. n79=!1:on text:*:#:floodchan
  153. n80=#floodchan end
  154. n81=#floodchat start
  155. n82=!1:on chat:*:{
  156. n83=  if ((%textlength != $null) && ($len($parms) > %textlength)) { .close -c $nick | notice $nick Chat Flood! You are being ignored. | unset %flood.chat. [ $+ [ $nick ] ] | .ignore -ntu45 $nick 2 | goto end }
  157. n84=  inc %flood.chat. [ $+ [ $nick ] ] 1
  158. n85=  if %flood.chat. [ $+ [ $nick ] ] == 1 .timer 1 10 unset %flood.chat. [ $+ [ $nick ] ]
  159. n86=  if %flood.chat. [ $+ [ $nick ] ] == 5 { .close -c $nick | notice $nick Chat Flood! You are being ignored. | unset %flood.chat. [ $+ [ $nick ] ] | .ignore -ntu45 $nick 2 }
  160. n87=  :end
  161. n88=}
  162. n89=#floodchat end
  163. n90=#floodctcpreply disabled
  164. n91=!1:on ctcpreply:*:{
  165. n92=  inc %flood.ctcpreply. [ $+ [ $wildsite ] ] 1
  166. n93=  if %flood.ctcpreply. [ $+ [ $wildsite ] ] == 1 .timer 1 12 unset %flood.ctcpreply. [ $+ [ $wildsite ] ]
  167. n94=  if %flood.ctcpreply. [ $+ [ $wildsite ] ] == 3 { notice $nick Private CTCP Reply Flood! You are being ignored. | unset %flood.ctcpreply. [ $+ [ $wildsite ] ] | .ignore -nu90 $wildsite }
  168. n95=  if $parm1 == ping { %time = $ctime - $parm2 | notice $nick [ $+ $nick PING reply]: %time secs | unset %time }
  169. n96=}
  170. n97=#floodctcpreply end
  171. n98=#floodinvite start
  172. n99=!1:on invite:#:{
  173. n100=  inc %flood.invite. [ $+ [ $wildsite ] ] 1
  174. n101=  if %flood.invite. [ $+ [ $wildsite ] ] == 1 .timer 1 90 unset %flood.invite. [ $+ [ $wildsite ] ]
  175. n102=  if %flood.invite. [ $+ [ $wildsite ] ] == 3 { notice $nick Invite Flood! All further invites from you will be ignored. | unset %flood.invite. [ $+ [ $wildsite ] ] | .ignore -iu90 $wildsite }
  176. n103=}
  177. n104=#floodinvite end
  178. n105=#floodnick start
  179. n106=!@1:on nick:{
  180. n107=  inc %flood.nickname. [ $+ [ $wildsite ] ] 1
  181. n108=  if %flood.nickname. [ $+ [ $wildsite ] ] == 1 .timer 1 20 unset %flood.nickname. [ $+ [ $wildsite ] ]
  182. n109=  if %flood.nickname. [ $+ [ $wildsite ] ] >= 3 { 
  183. n110=    mode $chan -o+b $newnick $wildsite
  184. n111=    kick $chan $newnick Nick Flood!
  185. n112=    .timer 1 45 mode $chan -b $wildsite
  186. n113=    set %f 0
  187. n114=    :do
  188. n115=    inc %f 1
  189. n116=    if $chan(%f) == $null goto end
  190. n117=    if $chan(%f) == $chan goto do
  191. n118=    if $newnick ison $chan(%f) { mode $chan(%f) -o+b $newnick $wildsite | kick $chan(%f) $newnick Nick Flood! | .timer 1 45 mode $chan(%f) -b $wildsite }
  192. n119=    goto do
  193. n120=    :end
  194. n121=    unset %f
  195. n122=  }
  196. n123=}
  197. n124=#floodnick end
  198. n125=#floodprivate start
  199. n126=!1:on action:*:?:{
  200. n127=  if ((%textlength != $null) && ($len($parms) > %textlength)) { .close -m $nick | notice $nick Private Action Flood! You are being ignored. | unset %flood.private. [ $+ [ $wildsite ] ] | .ignore -pu45 $wildsite | goto end }
  201. n128=  inc %flood.private. [ $+ [ $wildsite ] ] 1
  202. n129=  if %flood.private. [ $+ [ $wildsite ] ] == 1 .timer 1 10 unset %flood.private. [ $+ [ $wildsite ] ]
  203. n130=  if %flood.private. [ $+ [ $wildsite ] ] == 5 { .close -m $nick | notice $nick Private Action Flood! You are being ignored. | unset %flood.private. [ $+ [ $wildsite ] ] | .ignore -pu45 $wildsite }
  204. n131=  :end
  205. n132=}
  206. n133=!1:on notice:*:?:{
  207. n134=  if ((%textlength != $null) && ($len($parms) > %textlength)) { notice $nick Private Notice Flood! You are being ignored. | .ignore -nu45 $wildsite | goto end }
  208. n135=  inc %flood.notice. [ $+ [ $wildsite ] ] 1
  209. n136=  if %flood.notice. [ $+ [ $wildsite ] ] == 1 .timer 1 10 unset %flood.notice. [ $+ [ $wildsite ] ]
  210. n137=  if %flood.notice. [ $+ [ $wildsite ] ] == 5 { notice $nick Private Notice Flood! You are being ignored. | unset %flood.notice. [ $+ [ $nick ] ] | .ignore -nu45 $wildsite }
  211. n138=  :end
  212. n139=}
  213. n140=!1:on text:*:?:{
  214. n141=  if ((%textlength != $null) && ($len($parms) > %textlength)) { .close -m $nick | notice $nick Private Action Flood! You are being ignored. | unset %flood.private. [ $+ [ $wildsite ] ] | .ignore -pu45 $wildsite | goto end }
  215. n142=  inc %flood.private. [ $+ [ $wildsite ] ] 1
  216. n143=  if %flood.private. [ $+ [ $wildsite ] ] == 1 .timer 1 10 unset %flood.private. [ $+ [ $wildsite ] ]
  217. n144=  if %flood.private. [ $+ [ $wildsite ] ] == 5 { .close -m $nick | notice $nick Private Text Flood! You are being ignored. | unset %flood.private. [ $+ [ $wildsite ] ] | .ignore -pu45 $wildsite }
  218. n145=  :end
  219. n146=}
  220. n147=#floodprivate end
  221. n148=#floodrevdoor start
  222. n149=!@1:on part:#:{
  223. n150=  inc %flood.part. [ $+ [ $nick ] ] 1
  224. n151=  if %flood.part. [ $+ [ $nick ] ] == 1 .timer 1 5 unset %flood.part. [ $+ [ $nick ] ]
  225. n152=  if %flood.part. [ $+ [ $nick ] ] == 3 {
  226. n153=    ban -u60 $chan $nick 2
  227. n154=    describe $chan has banned $nick for a Revolving Door Flood!
  228. n155=    notice $nick You have been banned from $chan for a Revolving Door Flood!
  229. n156=    unset %flood.part. [ $+ [ $nick ] ]
  230. n157=  }
  231. n158=}
  232. n159=#floodrevdoor end
  233. n160=#floodserv start
  234. n161=!1:on serv:*:{
  235. n162=  if ((%textlength != $null) && ($len($parms) > %textlength)) { .close -f $nick | notice $nick Server Flood! You are being ignored. | unset %flood.serv. [ $+ [ $nick ] ] | .ignore -ntu45 $nick 2 | goto end }
  236. n163=  inc %flood.serv. [ $+ [ $nick ] ] 1
  237. n164=  if %flood.serv. [ $+ [ $nick ] ] == 1 .timer 1 10 unset %flood.serv. [ $+ [ $nick ] ]
  238. n165=  if %flood.serv. [ $+ [ $nick ] ] == 5 { .close -f $nick | notice $nick Server Flood! You are being ignored. | unset %flood.serv. [ $+ [ $nick ] ] | .ignore -ntu45 $nick 2 }
  239. n166=  :end
  240. n167=}
  241. n168=#floodserv end
  242. n169=#shitlist disabled
  243. n170=*666!:ON JOIN:#:ban $chan $nick 2 | ban $chan $nick 3 | kick $chan $nick -=ò[ShitListed]ò=-
  244. n171=#shitlist end
  245.  
  246. [Raw]
  247. n0=#Luser Start
  248. n1=251:* {
  249. n2=  recho 3 ----------( LUSERS: $nick $+ : $+ $port )----------
  250. n3=  %lusers.ave.1 = $parm4 + $parm7
  251. n4=  %lusers.ave.2 = %lusers.ave.1 / $parm10
  252. n5=  recho 3 There are currently %lusers.ave.1 users globally on $parm10 servers.
  253. n6=  recho 3 An average of %lusers.ave.2 Users per server.
  254. n7=  halt
  255. n8=}
  256. n9=252:* {
  257. n10=  %lusers.ave.3 = %lusers.ave.1 / $parm2
  258. n11=  recho 3 There are currently $parm2 opers globally on IRC.
  259. n12=  recho 3 An average of %lusers.ave.3 Users per oper.
  260. n13=  halt
  261. n14=}
  262. n15=254:* {
  263. n16=  %lusers.ave.4 = %lusers.ave.1 / $parm2
  264. n17=  recho 3 There are currently $parm2 channels globally formed.
  265. n18=  recho 3 An average of %lusers.ave.4 User(s) per channel.
  266. n19=  halt
  267. n20=}
  268. n21=253:*:recho 3 $parm2* | halt  
  269. n22=255:*:recho 3 $parm2* | recho 3 ----------( End of LUSERS: $nick )---------- | unset %lusers.* | unset %lusers.* | halt
  270. n23=#Luser end
  271. n24=#MOTD start
  272. n25=1:*:halt
  273. n26=2:*:halt
  274. n27=3:*:halt
  275. n28=4:*:halt
  276. n29=371:*:halt
  277. n30=372:*:halt 
  278. n31=373:*:halt
  279. n32=374:*:halt 
  280. n33=375:*:halt 
  281. n34=376:*:halt
  282. n35=#MOTD end
  283. n36=311:*:echo 2 $active <-> <<<<<<<  $+ WHOIS  | $+ $parm2 $+ |   $+  >>>>>>> | echo 2 $active <->  : $+ Address $+ :   $parm3 $+ @ $+ $parm4 | echo 2 $active <->  : $+ IRCname $+ : $parm6* | halt
  284. n37=319:*:echo 2 $active <-> : $+ Channels $+ :  $parm3* | halt
  285. n38=312:*:echo 2 $active <-> : $+ Server $+ : $parm3 :: $parm4* | halt
  286. n39=301:*:echo 2 $active <-> : $+ Away $+ : $parm3* | halt
  287. n40=313:*:echo 2 $active <-> : $+ IRCop $+ : has IRC operator status | halt
  288. n41=401:*:echo 2 $active <-> Guess What?  $parm2 is not on IRC!
  289. n42=318:*:echo 2 $active <-> <<<<<<<   End of /whois : $parm2  >>>>>>>> | halt
  290. n43=243:* {
  291. n44=  recho 4 $parm2 $+ :Line on $nick $+ : $parm5 $+ ( $+ $parm3 $+ )
  292. n45=  halt
  293. n46=}
  294. n47=381:*:recho 6 WOW: You got IRC operator Status. (+o) | halt
  295. n48=465:*:recho 4 Kline on your host detected. Unable to connect to server. | halt
  296. n49=474:*:recho 1 $parm2 $+ : You're Banned (+b) | halt
  297. n50=473:*:recho 1 $parm2 $+ : Channel is Invite Only. (+i) | halt
  298. n51=471:*:recho 1 $parm2 $+ : Channel is full (+l) | halt
  299. n52=472:*:recho 1 $parm2 $+ : Incorrect Character | halt
  300. n53=475:*:recho 1 $parm2 $+ : Channel requires correct key to enter. (+k) | halt
  301. n54=481:*:recho 1 Need to kiss some more ass Cauz U Not an IRC Operator, from: $nick $+ ) | halt
  302. n55=482:* {
  303. n56=  if ($me isop $parm2) {
  304. n57=    echo 4 $active %recho $parm2 $+ @ $+ $nick is desynched....
  305. n58=    halt
  306. n59=  }
  307. n60=  else {
  308. n61=    recho 1 WhaT??  You aren't oped in  $+ $parm2 $+ 
  309. n62=    halt
  310. n63=  }
  311. n64=}
  312. n65=404:* {
  313. n66=  if ($me isop $parm2) {
  314. n67=    echo 4 $active <-> $parm2 @ $nick is desynched...
  315. n68=    halt
  316. n69=  }
  317. n70=  elseif (m !isin $mode($parm2)) {
  318. n71=    echo 4 $active <-> $parm2 @ $nick is desynched...
  319. n72=    halt
  320. n73=  }
  321. n74=  else {
  322. n75=    echo 4 $active <-> $parm2 $+ : Cannot send to channel.
  323. n76=    halt
  324. n77=  }
  325. n78=}
  326. n79=306:*:recho 1 aWaY: Tired of IRC huh?! | halt
  327. n80=305:*:recho 1 Welcome bak $me $+ ! | halt
  328. n81=364:* {
  329. n82=  if ($parm4 >= %links.h) {
  330. n83=    echo 4 $active %recho $parm2 is ( $+ $parm4 $+ ) hops away.
  331. n84=    inc %links.1
  332. n85=  }
  333. n86=  halt
  334. n87=}
  335. n88=365:* {
  336. n89=  echo 4 $active %recho End of /LagL, ( $+ %links.1 $+ ) Large hop servers found.
  337. n90=  halt
  338. n91=}
  339. n92=1:ON CTCPREPLY:PING* {
  340. n93=  set %pt $ctime - $parm2
  341. n94=  if (%pt < 3) { %pt = 0 }
  342. n95=  if ($nick != $me) { echo $active <-> PING Reply: $nick $+ ( $+ $address $+ ): %pt seconds }
  343. n96=  if ($nick == $me) { if (%pt >= 15) { echo 4 $active >>> Huge Lag Detected ( $+ %pt secs @ $server -/- $port $+ ) } | }
  344. n97=  halt
  345. n98=}
  346.